| / Amiga Plus 2002 #11
/ Amiga Plus CD - 2002 - No. 11.iso / Tools / Development / PowerD / powerd / source / lib / powerd_lib.lha / PowerD / OpenW.ass
| < prev | next > |
| Comma Seperated Value File | 2000-02-02 | 903b | 45 rows |
| # | ; (46 | a7) - left | |||||
|---|---|---|---|---|---|---|---|
| 1 | ; (42 | a7) - top | |||||
| 2 | ; (38 | a7) - width | |||||
| 3 | ; (34 | a7) - height | |||||
| 4 | ; (28 | a7) - idcmp | |||||
| 5 | ; (24 | a7) - flags | |||||
| 6 | ; (20 | a7) - title | |||||
| 7 | ; (16 | a7) - screen | |||||
| 8 | ; (12 | a7) - stype | |||||
| 9 | ; (8 | a7) - gadgets | |||||
| 10 | ; (4 | a7) - tags | |||||
| 11 | xdef _OpenW | ||||||
| 12 | _OpenW move.l a6 | -(a7) | |||||
| 13 | lea (.nw | pc) | a0 | ||||
| 14 | move.l (4+4 | a7) | (48 | a0) | |||
| 15 | move.l (4+8 | a7) | (18 | a0) | |||
| 16 | move.w (4+14 | a7) | (46 | a0) | |||
| 17 | move.l (4+16 | a7) | (30 | a0) | |||
| 18 | move.l (4+20 | a7) | (26 | a0) | |||
| 19 | move.l (4+24 | a7) | d0 | ||||
| 20 | moveq #18 | d1 ; extended structure | |||||
| 21 | bset d1 | d0 | |||||
| 22 | move.l d0 | (14 | a0) | ||||
| 23 | move.l (4+28 | a7) | (10 | a0) | |||
| 24 | move.w (4+34 | a7) | (6 | a0) | |||
| 25 | move.w (4+38 | a7) | (4 | a0) | |||
| 26 | move.w (4+42 | a7) | (2 | a0) | |||
| 27 | move.w (4+46 | a7) | (a0) | ||||
| 28 | move.l _IntuitionBase | a6 | |||||
| 29 | jsr -$cc(a6) ; OpenWindow() | ||||||
| 30 | move.l d0 | a0 | |||||
| 31 | move.l a0 | d0 | |||||
| 32 | beq.s .exit | ||||||
| 33 | move.l (50 | a0) | _stdrast | ||||
| 34 | .exit move.l (a7)+ | a6 | |||||
| 35 | rts | ||||||
| 36 | .nw dc.w 0 | 0 | 0 | 0 | -1 | ||
| 37 | dc.l 0 | 0 | 0 | 0 | 0 | 0 | 0 |
| 38 | dc.w 80 | 25 | -1 | -1 | 0 | ||
| 39 | dc.l 0 ; tags | ||||||
| 40 | xdef _stdrast | ||||||
| 41 | _stdrast dc.l 0 | ||||||
| 42 | xdef coloura | ||||||
| 43 | coloura dc.l 1 | ||||||
| 44 | xref _IntuitionBase |